home *** CD-ROM | disk | FTP | other *** search
/ Nebula 1 / Nebula One.iso / Utilities / Workspace / Background3.2 / Source / Background / PSsplat.psw < prev    next >
Text File  |  1995-06-12  |  275b  |  12 lines

  1. defineps _PSsplat( float x1, y1, w, h, x2, y2)
  2.   x1 y1 w h        %% Throw the parameters up there
  3.   gstate %% currentgstate    %% get the current gstate
  4.   x2 y2
  5.   1            %% we want to copy the area
  6.   composite        %% go for it.
  7. endps
  8.  
  9. defineps PSputback()
  10.   0 currentwindow setowner
  11. endps
  12.